home *** CD-ROM | disk | FTP | other *** search
- property pID
-
- on getPropertyDescriptionList
- pippo = the memberNum of sprite the currentSpriteNum
- propertyDescriptionList = [#pID: [#comment: "ID dipinto (da 1 a 12)", #format: #integer, #default: 1]]
- return propertyDescriptionList
- end
-
- on mouseWithin me
- set the blend of sprite the currentSpriteNum to 100
- cursor(280)
- dati = line pID of field "dati"
- titolo = item 1 of dati
- data = item 3 of dati
- set the text of field "dida1" to titolo && "(" & data & ")"
- updateStage()
- end
-
- on mouseLeave me
- set the blend of sprite the currentSpriteNum to 40
- set the text of field "dida1" to " "
- cursor(-1)
- updateStage()
- end
-
- on mouseDown me
- cursor(280)
- end
-
- on mouseUp me
- global gID, gElencoOpere
- cursor(-1)
- gID = pID
- preparascheda()
- aggiungiBACK()
- gElencoOpere = 0
- go("scheda")
- end
-